ocr: = MESSAGES.HFOrml.action method. action(var eventinfo ActionEvent) var: Errmsgstr String i Smallint ErrMsgbyn Arrayll String endvar: if eventinfo.1sPrefilter0) then T This code: executes for: each object on the: form. else : This: code executes only for the Form. endif doDerauit if errorCode() < 0 then ErrMsgstr = errorMessagec) Errhsgstr.breakmpart(ErrisgDyn,rin") ErrMsgstr - : for i From 1 to: Errisguyn-512e0 ErrMsgstr =: ErrMsgstr + ErrMsgDyn(1] endFor: nessagetErrisgstr) endif endMethod Edit: Line: 9 Cols 1:
